home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1995-09-14 | 1.7 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 66%
| dexvert
| GW-BASIC (document/gwBasic)
| ext
| Supported |
| 66%
| dexvert
| GFA-BASIC Atari (other/gfaBASICAtari)
| ext
| Supported |
| 1%
| dexvert
| Amiga BASIC Protected File (other/amigaBASICProtectedFile)
| ext
| Unsupported |
| 1%
| dexvert
| BAS VBDOS Pro 1.0 Source (other/basVBDOSPro10Source)
| ext
| Unsupported |
| 1%
| dexvert
| Visual Basic Tokenized Source (other/visualBasicTokenizedSource)
| ext
| Unsupported |
| 1%
| dexvert
| ZBASIC (other/zbasic)
| ext
| Unsupported |
| 100%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| e0 06 00 00 0d 0a 27 20 | 44 6f 75 62 6c 69 6e 67 |......' |Doubling|
|00000010| 20 77 69 74 68 20 69 6e | 74 65 72 70 6f 6c 61 74 | with in|terpolat|
|00000020| 69 6f 6e 0d 0a 20 0d 0a | 27 20 49 6e 70 75 74 3a |ion.. ..|' Input:|
|00000030| 09 31 2d 34 2d 38 2d 32 | 34 20 62 69 74 0d 0a 27 |.1-4-8-2|4 bit..'|
|00000040| 20 4f 75 74 70 75 74 3a | 09 69 64 65 6d 0d 0a 0d | Output:|.idem...|
|00000050| 0a 27 20 41 75 74 68 6f | 72 3a 09 41 6e 64 72 65 |.' Autho|r:.Andre|
|00000060| 61 20 42 65 6e 6f 6e 69 | 09 09 09 20 72 65 76 3a |a Benoni|... rev:|
|00000070| 09 31 2e 32 0d 0a 0d 0a | 0d 0a 73 74 72 69 6e 67 |.1.2....|..string|
|00000080| 20 20 20 20 09 69 6e 70 | 46 69 6c 65 2c 6f 75 74 | .inp|File,out|
|00000090| 46 69 6c 65 0d 0a 44 65 | 76 43 6f 6e 09 49 62 6d |File..De|vCon.Ibm|
|000000a0| 70 2c 4f 62 6d 70 2c 44 | 62 6d 70 0d 0a 52 47 42 |p,Obmp,D|bmp..RGB|
|000000b0| 09 70 69 78 2c 70 69 78 | 73 2c 70 69 78 74 2c 70 |.pix,pix|s,pixt,p|
|000000c0| 69 78 71 0d 0a 66 6c 6f | 61 74 20 20 09 78 2c 79 |ixq..flo|at .x,y|
|000000d0| 0d 0a 0d 0a 69 6e 70 46 | 69 6c 65 3d 22 54 65 73 |....inpF|ile="Tes|
|000000e0| 74 69 2e 62 6d 70 22 0d | 0a 6f 75 74 46 69 6c 65 |ti.bmp".|.outFile|
|000000f0| 3d 22 54 65 73 74 6f 2e | 62 6d 70 22 0d 0a 0d 0a |="Testo.|bmp"....|
|00000100| 49 62 6d 70 3d 4c 6f 61 | 64 49 6d 61 67 65 28 69 |Ibmp=Loa|dImage(i|
|00000110| 6e 70 46 69 6c 65 29 0d | 0a 4f 62 6d 70 3d 43 72 |npFile).|.Obmp=Cr|
|00000120| 65 61 74 65 49 6d 61 67 | 65 28 49 62 6d 70 2e 57 |eateImag|e(Ibmp.W|
|00000130| 69 64 74 68 2a 32 2c 49 | 62 6d 70 2e 48 65 69 67 |idth*2,I|bmp.Heig|
|00000140| 68 74 2a 32 2c 49 62 6d | 70 2e 42 69 74 43 6f 75 |ht*2,Ibm|p.BitCou|
|00000150| 6e 74 29 0d 0a 44 62 6d | 70 3d 43 72 65 61 74 65 |nt)..Dbm|p=Create|
|00000160| 49 6d 61 67 65 28 49 62 | 6d 70 2e 57 69 64 74 68 |Image(Ib|mp.Width|
|00000170| 2a 32 2c 49 62 6d 70 2e | 48 65 69 67 68 74 2a 32 |*2,Ibmp.|Height*2|
|00000180| 2c 49 62 6d 70 2e 42 69 | 74 43 6f 75 6e 74 29 0d |,Ibmp.Bi|tCount).|
|00000190| 0a 0d 0a 69 66 28 28 49 | 62 6d 70 2e 42 69 74 43 |...if((I|bmp.BitC|
|000001a0| 6f 75 6e 74 3d 38 29 09 | 7c 28 49 62 6d 70 2e 42 |ount=8).||(Ibmp.B|
|000001b0| 69 74 43 6f 75 6e 74 3d | 34 29 29 0d 0a 20 20 20 |itCount=|4)).. |
|000001c0| 46 6f 72 20 79 3d 30 20 | 20 74 6f 20 32 35 35 0d |For y=0 | to 255.|
|000001d0| 0a 20 20 20 20 20 20 70 | 69 78 3d 47 65 74 50 61 |. p|ix=GetPa|
|000001e0| 6c 65 74 74 65 28 49 62 | 6d 70 2c 79 29 0d 0a 20 |lette(Ib|mp,y).. |
|000001f0| 20 20 20 20 20 53 65 74 | 50 61 6c 65 74 74 65 28 | Set|Palette(|
|00000200| 4f 62 6d 70 2c 79 2c 70 | 69 78 29 0d 0a 20 20 20 |Obmp,y,p|ix).. |
|00000210| 20 20 20 53 65 74 50 61 | 6c 65 74 74 65 28 44 62 | SetPa|lette(Db|
|00000220| 6d 70 2c 79 2c 70 69 78 | 29 0d 0a 20 20 20 6e 65 |mp,y,pix|).. ne|
|00000230| 78 74 20 79 0d 0a 65 6e | 64 69 66 0d 0a 0d 0a 46 |xt y..en|dif....F|
|00000240| 6f 72 20 79 3d 30 20 74 | 6f 20 49 62 6d 70 2e 48 |or y=0 t|o Ibmp.H|
|00000250| 65 69 67 68 74 2d 31 0d | 0a 20 20 20 46 6f 72 20 |eight-1.|. For |
|00000260| 78 3d 30 20 74 6f 20 49 | 62 6d 70 2e 57 69 64 74 |x=0 to I|bmp.Widt|
|00000270| 68 2d 31 0d 0a 20 20 20 | 20 20 20 70 69 78 3d 47 |h-1.. | pix=G|
|00000280| 65 74 50 69 78 65 6c 28 | 49 62 6d 70 2c 78 2c 79 |etPixel(|Ibmp,x,y|
|00000290| 29 0d 0a 20 20 20 20 20 | 20 70 69 78 73 3d 47 65 |).. | pixs=Ge|
|000002a0| 74 50 69 78 65 6c 28 49 | 62 6d 70 2c 78 2b 31 2c |tPixel(I|bmp,x+1,|
|000002b0| 79 29 0d 0a 20 20 20 20 | 20 20 70 69 78 74 3d 47 |y).. | pixt=G|
|000002c0| 65 74 50 69 78 65 6c 28 | 49 62 6d 70 2c 78 2c 79 |etPixel(|Ibmp,x,y|
|000002d0| 2b 31 29 0d 0a 20 20 20 | 20 20 20 70 69 78 71 3d |+1).. | pixq=|
|000002e0| 47 65 74 50 69 78 65 6c | 28 49 62 6d 70 2c 78 2b |GetPixel|(Ibmp,x+|
|000002f0| 31 2c 79 2b 31 29 0d 0a | 0d 0a 20 20 20 20 20 20 |1,y+1)..|.. |
|00000300| 70 69 78 73 2e 72 65 64 | 3d 70 69 78 73 2e 72 65 |pixs.red|=pixs.re|
|00000310| 64 2b 70 69 78 2e 72 65 | 64 2f 32 0d 0a 20 20 20 |d+pix.re|d/2.. |
|00000320| 20 20 20 70 69 78 74 2e | 72 65 64 3d 70 69 78 74 | pixt.|red=pixt|
|00000330| 2e 72 65 64 2b 70 69 78 | 2e 72 65 64 2f 32 0d 0a |.red+pix|.red/2..|
|00000340| 20 20 20 20 20 20 70 69 | 78 71 2e 72 65 64 3d 70 | pi|xq.red=p|
|00000350| 69 78 71 2e 72 65 64 2b | 70 69 78 2e 72 65 64 2f |ixq.red+|pix.red/|
|00000360| 32 0d 0a 0d 0a 20 20 20 | 20 20 20 70 69 78 73 2e |2.... | pixs.|
|00000370| 67 72 65 65 6e 3d 70 69 | 78 73 2e 67 72 65 65 6e |green=pi|xs.green|
|00000380| 2b 70 69 78 2e 67 72 65 | 65 6e 2f 32 0d 0a 20 20 |+pix.gre|en/2.. |
|00000390| 20 20 20 20 70 69 78 74 | 2e 67 72 65 65 6e 3d 70 | pixt|.green=p|
|000003a0| 69 78 74 2e 67 72 65 65 | 6e 2b 70 69 78 2e 67 72 |ixt.gree|n+pix.gr|
|000003b0| 65 65 6e 2f 32 0d 0a 20 | 20 20 20 20 20 70 69 78 |een/2.. | pix|
|000003c0| 71 2e 67 72 65 65 6e 3d | 70 69 78 71 2e 67 72 65 |q.green=|pixq.gre|
|000003d0| 65 6e 2b 70 69 78 2e 67 | 72 65 65 6e 2f 32 0d 0a |en+pix.g|reen/2..|
|000003e0| 0d 0a 20 20 20 20 20 20 | 70 69 78 73 2e 62 6c 75 |.. |pixs.blu|
|000003f0| 65 3d 70 69 78 73 2e 62 | 6c 75 65 2b 70 69 78 2e |e=pixs.b|lue+pix.|
|00000400| 62 6c 75 65 2f 32 0d 0a | 20 20 20 20 20 20 70 69 |blue/2..| pi|
|00000410| 78 74 2e 62 6c 75 65 3d | 70 69 78 74 2e 62 6c 75 |xt.blue=|pixt.blu|
|00000420| 65 2b 70 69 78 2e 62 6c | 75 65 2f 32 0d 0a 20 20 |e+pix.bl|ue/2.. |
|00000430| 20 20 20 20 70 69 78 71 | 2e 62 6c 75 65 3d 70 69 | pixq|.blue=pi|
|00000440| 78 71 2e 62 6c 75 65 2b | 70 69 78 2e 62 6c 75 65 |xq.blue+|pix.blue|
|00000450| 2f 32 0d 0a 0d 0a 20 20 | 20 20 20 20 53 65 74 50 |/2.... | SetP|
|00000460| 69 78 65 6c 28 4f 62 6d | 70 2c 78 2a 32 2c 79 2a |ixel(Obm|p,x*2,y*|
|00000470| 32 2c 70 69 78 29 0d 0a | 20 20 20 20 20 20 53 65 |2,pix)..| Se|
|00000480| 74 50 69 78 65 6c 28 4f | 62 6d 70 2c 78 2a 32 2b |tPixel(O|bmp,x*2+|
|00000490| 31 2c 79 2a 32 2c 70 69 | 78 73 29 0d 0a 20 20 20 |1,y*2,pi|xs).. |
|000004a0| 20 20 20 53 65 74 50 69 | 78 65 6c 28 4f 62 6d 70 | SetPi|xel(Obmp|
|000004b0| 2c 78 2a 32 2c 79 2a 32 | 2b 31 2c 70 69 78 74 29 |,x*2,y*2|+1,pixt)|
|000004c0| 0d 0a 20 20 20 20 20 20 | 53 65 74 50 69 78 65 6c |.. |SetPixel|
|000004d0| 28 4f 62 6d 70 2c 78 2a | 32 2b 31 2c 79 2a 32 2b |(Obmp,x*|2+1,y*2+|
|000004e0| 31 2c 70 69 78 71 29 0d | 0a 0d 0a 20 20 20 20 20 |1,pixq).|... |
|000004f0| 20 27 43 6c 65 61 72 20 | 74 68 69 73 20 66 6f 72 | 'Clear |this for|
|00000500| 20 62 65 74 74 65 72 20 | 70 65 72 66 6f 72 6d 61 | better |performa|
|00000510| 6e 63 65 0d 0a 20 20 20 | 20 20 20 53 65 74 50 69 |nce.. | SetPi|
|00000520| 78 65 6c 28 44 62 6d 70 | 2c 78 2a 32 2c 79 2a 32 |xel(Dbmp|,x*2,y*2|
|00000530| 2c 70 69 78 29 0d 0a 20 | 20 20 20 20 20 53 65 74 |,pix).. | Set|
|00000540| 50 69 78 65 6c 28 44 62 | 6d 70 2c 78 2a 32 2b 31 |Pixel(Db|mp,x*2+1|
|00000550| 2c 79 2a 32 2c 70 69 78 | 29 0d 0a 20 20 20 20 20 |,y*2,pix|).. |
|00000560| 20 53 65 74 50 69 78 65 | 6c 28 44 62 6d 70 2c 78 | SetPixe|l(Dbmp,x|
|00000570| 2a 32 2c 79 2a 32 2b 31 | 2c 70 69 78 29 0d 0a 20 |*2,y*2+1|,pix).. |
|00000580| 20 20 20 20 20 53 65 74 | 50 69 78 65 6c 28 44 62 | Set|Pixel(Db|
|00000590| 6d 70 2c 78 2a 32 2b 31 | 2c 79 2a 32 2b 31 2c 70 |mp,x*2+1|,y*2+1,p|
|000005a0| 69 78 29 0d 0a 0d 0a 20 | 20 20 4e 65 78 74 20 78 |ix).... | Next x|
|000005b0| 0d 0a 20 20 20 69 66 20 | 28 20 79 25 31 36 3d 30 |.. if |( y%16=0|
|000005c0| 29 0d 0a 20 20 20 20 20 | 20 50 72 65 76 69 65 77 |).. | Preview|
|000005d0| 28 4f 62 6d 70 2c 22 4f | 75 74 70 75 74 22 2c 35 |(Obmp,"O|utput",5|
|000005e0| 2c 35 2c 4f 62 6d 70 2e | 57 69 64 74 68 2b 31 30 |,5,Obmp.|Width+10|
|000005f0| 2c 4f 62 6d 70 2e 48 65 | 69 67 68 74 2b 33 30 29 |,Obmp.He|ight+30)|
|00000600| 09 0d 0a 20 20 20 20 20 | 20 27 43 6c 65 61 72 20 |... | 'Clear |
|00000610| 74 68 69 73 20 66 6f 72 | 20 62 65 74 74 65 72 20 |this for| better |
|00000620| 70 65 72 66 6f 72 6d 61 | 6e 63 65 0d 0a 20 20 20 |performa|nce.. |
|00000630| 20 20 20 50 72 65 76 69 | 65 77 28 44 62 6d 70 2c | Previ|ew(Dbmp,|
|00000640| 22 4f 75 74 70 75 74 22 | 2c 34 30 30 2c 35 2c 4f |"Output"|,400,5,O|
|00000650| 62 6d 70 2e 57 69 64 74 | 68 2b 31 30 2c 4f 62 6d |bmp.Widt|h+10,Obm|
|00000660| 70 2e 48 65 69 67 68 74 | 2b 33 30 29 09 0d 0a 20 |p.Height|+30)... |
|00000670| 20 20 65 6e 64 69 66 0d | 0a 20 20 20 44 73 70 57 | endif.|. DspW|
|00000680| 68 69 6c 65 28 22 43 6f | 6e 76 65 72 74 22 2c 31 |hile("Co|nvert",1|
|00000690| 30 30 2f 20 49 62 6d 70 | 2e 48 65 69 67 68 74 2a |00/ Ibmp|.Height*|
|000006a0| 79 29 0d 0a 4e 65 78 74 | 20 79 0d 0a 0d 0a 53 61 |y)..Next| y....Sa|
|000006b0| 76 65 49 6d 61 67 65 28 | 4f 62 6d 70 2c 6f 75 74 |veImage(|Obmp,out|
|000006c0| 46 69 6c 65 29 0d 0a 44 | 73 70 57 68 69 6c 65 28 |File)..D|spWhile(|
|000006d0| 22 22 2c 30 29 0d 0a 44 | 73 70 4d 65 73 28 22 45 |"",0)..D|spMes("E|
|000006e0| 6e 64 22 29 | |nd") | |
+--------+-------------------------+-------------------------+--------+--------+
